Top 10k strings from Cribb, The (1984)(Norman Wallace).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
13 CTOT=CTOT+ 8 ()*+,-./0123456789:;< 6 4 45 5 6 5 5 56 6 4 KLMNOPQRSTUVWXYZ[\]^_ 4 8 89 9 4 7 78 8 4 6 67 7 4 3 34 4 4 2 23 3 4 3 THE CRIBB 3 =RUN SCORES 3 POINTS" 3 =15 SCORES 2 POINTS" 3 8 88 8 2 THE CRIBB #* 2 S 2 PT=PT+TOT: 2 PRESS YOUR CHOICE 2 CT=CT+TOT: 2 =PAIR SCORES 2 POINTS" 2 "THE CRIBB" 2 "1";"For example 8 2 "1";"For example 4 2 YOUR TOTAL SCORE ";PT;" " 2 YOUR CRIB 2 YOU CANNOT PLAY 2 PLEASE WAIT LOADING ": 2 PLEASE STOP THE TAPE ": 2 PLEASE CHOOSE YOUR CARD 1-4 "'" 1 x,pos;r$(card,x-11 1 x,pos;r$(card,x) 1 s 1 po2=po1+po2 1 hand=z(x): 1 boxcompsu=boxcompsu+ 1 boxcompsu=59411 1 boxcompsu, 1 boxcomp=59401 1 boxcomP=boxcomp+ 1 aaLMLaaaaaaYaaaY2 2 1 a$=a$+"extra card is dealt an is known as THE START card. If the start is a JACK then the player who has the crib scores TWO POINTS FOR HIS HEELS." 1 a$=a$+"a standard pack of 52 cards and consists of six cards dealt to" 1 a$=a$+"The player who does not have the crib playsfirst by choosing a card from his hand.This is placed face up and its value is added to the hand total.( FACE cards have thevalue of TEN.)" 1 a$=a$+"The crib hand is givento each player alternately with each hand. The player who gets the 1st crib is chosen randomly at the start of the game." 1 a$=a$+"Simulation of the popular card" 1 a$=a$+" two players discarding 2 cards thus leaving each player with a four card hand." 1 a$=a$+" played here.You play one player and the computer opposes you." 1 a$=a$+" for two players is the version " 1 a$=a$+" The game is made up of six partswhich are as follows:-" 1 a$=a$+" game cribbage.The six card game" 1 a$=a$+" each player." 1 a$="have the same face value and therforewould score SIX points." 1 a$="areall of the same suit and thus ONE point is scored for each of the cards in the flush making a score of FOUR points." 1 a$="areall in sequence and therfore ONEpoint is scored for each card inthe sequence making a score of FOUR points." 1 a$="The other player then plays andif any of the scoring criteria are met (except flush) then the appropriate number of points areawarded and added to the SCORE of that player." 1 a$="The cards are turned face down and the player who did not play last now plays (if they have anycards).Play alternates until allthe cards are played." 1 a$="THE SHOW IS NOW SCORED." 1 a$="THE SHOW -:After all the cardshave been played the players score their hand plus the START starting with the player withoutthe crib": 1 a$="THE PLAY-:The play begins afterthe discard and cut." 1 a$="THE PLAY Cont.:IF 31 is reachedthen the player who played the last card scores TWO FOR 31.IF 31 is not reached and neither ofthe players can continue to playwithout going over 31 then the player who played the last card scores ONE FOR LAST CARD." 1 a$="Points are scored for any of the scoring criteria met except that a four card flush must not include the START card.If any ofthe players has a JACK of the same suit as the START then theyscore ONE FOR HIS NOBS.": 1 a$="Play then alternates between players (scoring if appropriate)until 31 is reached or until neither player can play without going over 31." 1 a$="Once the hands are scored the crib is scored in the same way except only five card flushes are allowed." 1 a$="A SAMPLE SHOW NOW FOLLOWS": 1 a$="(6) A FLUSH-:A flush is made upof 4 or more cards of the same suit ONE point is scored for each of the cards in the flush." 1 a$="(5) A RUN-:A run is made up of 3 or more cards in sequence ONE points is scored for each of thecards in the sequence." 1 a$="(4) PAIR ROYAL DOUBLE-: A pair royal double is made up of FOUR cards of the same face value andscores TWELVE points in total. ie. 2 points for each pair thatis possible." 1 a$="(3) PAIR ROYAL-:A pair royal ismade up of 3 cards of the same face value and scores SIX points ie. 2 points for each pair thatis possible." 1 a$="(2) PAIR -:A pair is made up ofany two cards of the same face value and each pair scores TWO points.": 1 a$="(1) THE DEAL.": 1 a$="(1) FIFTEENS -:Any combination of 2 or more cards which have a face value of FIFTEEN scores TWOpoints for each combination." 1 a$="(1) FIFTEEN SCORES 2 POINTS" 1 a$=" are the sameface value therfore would score TWO points." 1 a$=" and wouldscore TWO points.": 1 a$=" allhave the same face value and thus would score TWELVE points." 1 a$=" Welcome to THE CRIBB a computer" 1 a$=" The object of the game is to score 121 before your opponent." 1 a$=" THE DEAL:-The deal is made from" 1 a$=" THE CRIB:- The crib is an extrahand made up by each of the" 1 a$=" SCORING:- Scoring takes place during play and at the show the scoring criteria are as follows:-" 1 YaaaYaaaaaaaNaaaORPaaaQaaaaaaaYaaaY2 2 1 YaaaYaaaaaaEaFaa 1 YaaaYaaXaaaS 1 YaaaYaaIaaaJ 1 YOU CANNOT PLAY 1 WELCOME TO THE CRIBB A COMPUTER SIMULATION OF THE POPULAR CARD GAME CRIBBAGE. 1 W(G)=W(G+4 1 W(CP)=P(EE): 1 W(CP)=D(TA): 1 VaaaWaaaaaaaYaaaY2 2 1 V,PO;R$(CARD,V): 1 Please choose what you would like to do next by pressing the option you require. 1 PT=PT+CTOT: 1 PLEASE READ CASSETTE INLAY CARD 1 N.Wallace" 1 M(G)=Q(G): 1 M(G)=E(G): 1 M(G)=A(G): 1 L(G)=P(G): 1 L(G)=D(G): 1 L(G)=B(G): 1 HaaaDaaYaaaY2 2 1 GT=GT+DD2: 1 GT=GT+DD1: 1 DD1=W(CP): 1 CTOT=CTOT+2 1 CT=CT+CTOT: 1 CODE 1 CARD=P(EE)+((13 1 CARD=P(AA)+((13 1 CARD=L(Z)+((13 1 CARD=D(AS)+((13 1 CARD=(D(TA)+(13 1 A$="This hand scores 24 and is made up as follows-:": 1 A$="Please choose what you would like to do next by pressing the option you require." 1 A$="EXAMPLES OF EACH NOW FOLLOW.": 1 A$="(6) THE SHOW.": 1 A$="(6) FLUSH 1 POINT PER CARD" 1 A$="(5) THE PLAY.": 1 A$="(5) RUNS 1 POINT PER CARD " 1 A$="(4) SCORING.": 1 A$="(4) PAIR ROYAL DOUBLE SCORES 12" 1 A$="(3) THE CUT.": 1 A$="(3) PAIR ROYAL SCORES 6 POINTS" 1 A$="(2) THE CRIB.": 1 A$="(2) PAIR SCORES 2 POINTS" 1 A$=" THE CUT:- After the cards have been discarded by the players an" 1 =RUN SCORES 3 POINTS": 1 =15 SCORES 2 POINTS": 1 ;"YOUR SECOND CRIB CARD IS NO. ";Y$ 1 ;"YOUR FIRST CRIB CARD IS NO. ";O$ 1 ;"LOADING MAIN PROGRAM PLEASE WAIT" 1 ;"INCORRECT SAME CARD": 1 ;"(6) LOAD MAIN PROGRAM" 1 ;"(5) READ SHOW" 1 ;"(4) READ PLAY" 1 ;"(3) READ SCORING" 1 ;"(2) READ INTRODUCTION" 1 ;"(1) READ ALL INSTRUCTIONS" 1 ;" STOP THE TAPE " 1 ;" START THE TAPE " 1 ;" PRESS ANY KEY TO CONTINUE " 1 ;" PRESS ANY KEY TO CONTINUE " 1 ;" PLAYER "; 1 ;" IF YOU DO NOT HAVE A PRINTER " 1 ;" ";GT;" "; 1 ;" ": 1 123412351236124512461256134513461356145623452346235624563456 1 --(*******))))))...(((((((((()((--********))))))...(((((((((()((--***************************)((--***************************)((--***************************)*(--***************************)*(--***************************)*(--.**************************)*(--..((((((((((((((((((((((((()((--.(.(((((((((((((((////((((()((--)))))((( 1 *Q(EE))-13 1 *Q(AA))-13 1 *E(TA))-13 1 *E(AS))-13 1 (////((((()((--)))))(((((((((((((((((((((()((--)))))(((((((((((((((((((((()((--)))))((((((((((((((((((((((***--))))))))(((((((((((((((((((((*--)))))))(((((((((((((((((((((*2--))))))(((((((((((((((((((((*24--))))))((((((((((((((((((((*24,--))))))(((((((((((((((((((*24,(--))))))((((((((((((((((((*24,((--)))))((((((((((((((((((*24,(((--(((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((( 1 '''''" YOU DO NOT HAVE A PRINTER" 1 "7","10","8","11","2" 1 "2";"FIFTEENS SCORE 8 POINTS" 1 "2";" PAIRS SCORES 4 POINTS" 1 "2";" RUNS SCORE12 POINTS" 1 "2";" ": 1 "2"+a,po2;C$( 1 "1","2","3","4","3","4","5","3","4","5","6","7","8","9","12","10","11","12","13" 1 "0";"For example 9 1 "0";"For example 8 1 " THEN RELOAD." 1 " SWITCH OFF AND CONNECT" 1 " CONNECTED IF YOU HAVE ONE" 1 YOUR TOTAL SCORE 1 YOU HAVE WON THIS GAME 1 YOU HAVE PLAYED ALL YOUR CARDS 1 YOU GET TWO FOR 31 1 YOU GET ONE FOR LAST CARD 1 YOU GET 2 FOR HIS HEELS ": 1 WRONG CARD 1 WELL DONE 1 TOTAL SCORE 24 POINTS " 1 THREE FOR SIX 1 THESE ARE YOUR CARDS " 1 THERFORE I WILL"'" SCORE YOUR HAND FIRST " 1 THERFORE I "'" WILL SCORE MY HAND FIRST " 1 THE START 1 THE CRIBB 1 SCORING YOUR HAND " 1 SCORING MY HAND " 1 RUNS SCORE 12 " 1 RUNS SCORE "; 1 RUN FOR THREE 1 RUN FOR SIX 1 RUN FOR FOUR 1 RUN FOR FIVE 1 PRESS CARD NO. 1-6 " 1 PRESS ANY KEY TO START A GAME. 1 PRESS ANY KEY TO PLAY NEXT GAME 1 PRESS ANY KEY TO PLAY " 1 PRESS ANY KEY FOR NEXT HAND 1 PRESS ""C""opy or ""P""roceed ": 1 PLEASE WAIT A MOMENT WHILE I CHOOSE MY CARDS FOR THE CRIB " 1 PLEASE START THE TAPE " 1 PLEASE PRESS YOUR CHOICE ": 1 PLEASE PRESS (Y)es 1 PLEASE CHOOSE YOUR CARDS FOR THE CRIB 1 PAIRS etc. SCORE "; 1 PAIRS SCORE 4 " 1 PAIR FOR TWO 1 ONE FOR HIS NOBS 1 IT IS YOUR CRIB THIS HAND 1 IT IS MY CRIB THIS HAND 1 INSTRUCTIONS " 1 IF YOU REQUIRE INSTRUCTIONS 1 I WILL NOW SCORE YOUR HAND 1 I WILL NOW SCORE YOUR CRIB " 1 I WILL NOW SCORE MY HAND 1 I WILL NOW SCORE MY CRIB " 1 I HAVE WON THIS GAME 1 I HAVE CHOSEN MY CARDS 1 I GET TWO FOR 31 1 I GET ONE FOR LAST CARD 1 I GET 2 FOR HIS HEELS 1 I CANNOT PLAY 1 HARD LUCK 1 FOUR FOR TWELVE 1 FLUSH SCORE "; 1 FIFTEEN FOR TWO 1 DURING THE SHOW THIS CARD IS ADDED TO YOUR HAND MY HAND AND THE CRIB HAND. 1 COMPUTERS TOTAL SCORE ";CT;" " 1 COMPUTERS TOTAL SCORE 1 COMPUTER'S TOTAL SCORE ";CT;" " 1 COMPUTER "; 1 ARE CARDS ";O$;" AND ";Y$;" CORRECT "'" 1 9 96 6 1 8 84 4 1 7 79 9 1 6 68 8 1 6 64 4 1 5 57 7 1 1983 THRELFALL and HODGSON Compiled OK Program Length = bytes To run enter RAND USR " 1 15,s SCORE "; 1 15'S SCORE 8 " 1 I HAVE PLAYED ALL MY CARDS " 1 COMPUTER CRIBBAGE SIMULATION 1 ZX COMPILER V2.0 1